home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1998-05-21 | 2.7 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
| 100%
| file
| Emacs/XEmacs v20 byte-compiled Lisp data
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Emacs/XEmacs byte-compiled Lisp (generic)
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 14 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 75 73 74 69 6e 62 |piled by| justinb|
|00000020| 40 65 62 6f 6e 79 2e 63 | 72 61 79 2e 63 6f 6d 20 |@ebony.c|ray.com |
|00000030| 6f 6e 20 54 68 75 20 4a | 61 6e 20 32 32 20 31 34 |on Thu J|an 22 14|
|00000040| 3a 34 34 3a 33 37 20 31 | 39 39 38 0a 3b 3b 3b 20 |:44:37 1|998.;;; |
|00000050| 66 72 6f 6d 20 66 69 6c | 65 20 2f 68 6f 6d 65 2f |from fil|e /home/|
|00000060| 61 73 70 65 6e 30 37 2f | 6a 75 73 74 69 6e 62 2f |aspen07/|justinb/|
|00000070| 72 6f 6f 74 73 2f 66 72 | 65 65 77 61 72 65 2f 78 |roots/fr|eeware/x|
|00000080| 65 6d 61 63 73 2f 78 65 | 6d 61 63 73 2d 32 30 2e |emacs/xe|macs-20.|
|00000090| 33 2f 6c 69 73 70 2f 70 | 61 63 6b 61 67 65 73 2f |3/lisp/p|ackages/|
|000000a0| 66 6f 6e 74 6c 2d 68 6f | 6f 6b 73 2e 65 6c 0a 3b |fontl-ho|oks.el.;|
|000000b0| 3b 3b 20 65 6d 61 63 73 | 20 76 65 72 73 69 6f 6e |;; emacs| version|
|000000c0| 20 32 30 2e 33 20 22 56 | 61 74 69 63 61 6e 20 43 | 20.3 "V|atican C|
|000000d0| 69 74 79 22 20 58 45 6d | 61 63 73 20 20 4c 75 63 |ity" XEm|acs Luc|
|000000e0| 69 64 2e 0a 3b 3b 3b 20 | 62 79 74 65 63 6f 6d 70 |id..;;; |bytecomp|
|000000f0| 20 76 65 72 73 69 6f 6e | 20 32 2e 32 35 20 58 45 | version| 2.25 XE|
|00000100| 6d 61 63 73 3b 20 32 32 | 2d 4d 61 72 2d 39 36 2e |macs; 22|-Mar-96.|
|00000110| 0a 3b 3b 3b 20 6f 70 74 | 69 6d 69 7a 61 74 69 6f |.;;; opt|imizatio|
|00000120| 6e 20 69 73 20 6f 6e 2e | 0a 3b 3b 3b 20 74 68 69 |n is on.|.;;; thi|
|00000130| 73 20 66 69 6c 65 20 75 | 73 65 73 20 6f 70 63 6f |s file u|ses opco|
|00000140| 64 65 73 20 77 68 69 63 | 68 20 64 6f 20 6e 6f 74 |des whic|h do not|
|00000150| 20 65 78 69 73 74 20 69 | 6e 20 45 6d 61 63 73 20 | exist i|n Emacs |
|00000160| 31 39 2e 0a 0a 28 69 66 | 20 28 61 6e 64 20 28 62 |19...(if| (and (b|
|00000170| 6f 75 6e 64 70 20 27 65 | 6d 61 63 73 2d 76 65 72 |oundp 'e|macs-ver|
|00000180| 73 69 6f 6e 29 0a 09 20 | 28 6f 72 20 28 61 6e 64 |sion).. |(or (and|
|00000190| 20 28 62 6f 75 6e 64 70 | 20 27 65 70 6f 63 68 3a | (boundp| 'epoch:|
|000001a0| 3a 76 65 72 73 69 6f 6e | 29 20 65 70 6f 63 68 3a |:version|) epoch:|
|000001b0| 3a 76 65 72 73 69 6f 6e | 29 0a 09 20 20 20 20 20 |:version|).. |
|000001c0| 28 73 74 72 69 6e 67 2d | 6c 65 73 73 70 20 65 6d |(string-|lessp em|
|000001d0| 61 63 73 2d 76 65 72 73 | 69 6f 6e 20 22 32 30 22 |acs-vers|ion "20"|
|000001e0| 29 29 29 0a 20 20 20 20 | 28 65 72 72 6f 72 20 22 |))). |(error "|
|000001f0| 60 66 6f 6e 74 6c 2d 68 | 6f 6f 6b 73 2e 65 6c 27 |`fontl-h|ooks.el'|
|00000200| 20 77 61 73 20 63 6f 6d | 70 69 6c 65 64 20 66 6f | was com|piled fo|
|00000210| 72 20 45 6d 61 63 73 20 | 32 30 22 29 29 0a 0a 28 |r Emacs |20"))..(|
|00000220| 6f 72 20 28 62 6f 75 6e | 64 70 20 27 63 75 72 72 |or (boun|dp 'curr|
|00000230| 65 6e 74 2d 6c 6f 61 64 | 2d 6c 69 73 74 29 20 28 |ent-load|-list) (|
|00000240| 73 65 74 71 20 63 75 72 | 72 65 6e 74 2d 6c 6f 61 |setq cur|rent-loa|
|00000250| 64 2d 6c 69 73 74 20 6e | 69 6c 29 29 0a 0a 0a 23 |d-list n|il))...#|
|00000260| 40 31 38 34 31 20 53 65 | 74 20 66 6f 6e 74 69 66 |@1841 Se|t fontif|
|00000270| 69 63 61 74 69 6f 6e 20 | 64 65 66 61 75 6c 74 73 |ication |defaults|
|00000280| 20 61 70 70 72 6f 70 72 | 69 61 74 65 6c 79 20 66 | appropr|iately f|
|00000290| 6f 72 20 74 68 69 73 20 | 6d 6f 64 65 2e 0a 53 65 |or this |mode..Se|
|000002a0| 74 73 20 60 66 6f 6e 74 | 2d 6c 6f 63 6b 2d 6b 65 |ts `font|-lock-ke|
|000002b0| 79 77 6f 72 64 73 27 2c | 20 60 66 6f 6e 74 2d 6c |ywords',| `font-l|
|000002c0| 6f 63 6b 2d 6b 65 79 77 | 6f 72 64 73 2d 6f 6e 6c |ock-keyw|ords-onl|
|000002d0| 79 27 2c 20 60 66 6f 6e | 74 2d 6c 6f 63 6b 2d 73 |y', `fon|t-lock-s|
|000002e0| 79 6e 74 61 78 2d 74 61 | 62 6c 65 27 2c 0a 60 66 |yntax-ta|ble',.`f|
|000002f0| 6f 6e 74 2d 6c 6f 63 6b | 2d 62 65 67 69 6e 6e 69 |ont-lock|-beginni|
|00000300| 6e 67 2d 6f 66 2d 73 79 | 6e 74 61 78 2d 66 75 6e |ng-of-sy|ntax-fun|
|00000310| 63 74 69 6f 6e 27 20 61 | 6e 64 0a 60 66 6f 6e 74 |ction' a|nd.`font|
|00000320| 2d 6c 6f 63 6b 2d 6b 65 | 79 77 6f 72 64 73 2d 63 |-lock-ke|ywords-c|
|00000330| 61 73 65 2d 66 6f 6c 64 | 2d 73 65 61 72 63 68 27 |ase-fold|-search'|
|00000340| 2e 0a 0a 49 66 20 60 66 | 6f 6e 74 2d 6c 6f 63 6b |...If `f|ont-lock|
|00000350| 2d 64 65 66 61 75 6c 74 | 73 27 20 69 73 20 63 75 |-default|s' is cu|
|00000360| 72 72 65 6e 74 6c 79 20 | 73 65 74 2c 20 69 74 20 |rrently |set, it |
|00000370| 69 73 20 75 73 65 64 2e | 20 20 4f 74 68 65 72 77 |is used.| Otherw|
|00000380| 69 73 65 2c 20 74 68 65 | 0a 73 79 6d 62 6f 6c 20 |ise, the|.symbol |
|00000390| 6e 61 6d 69 6e 67 20 74 | 68 65 20 6d 61 6a 6f 72 |naming t|he major|
|000003a0| 20 6d 6f 64 65 20 69 73 | 20 65 78 61 6d 69 6e 65 | mode is| examine|
|000003b0| 64 20 66 6f 72 20 61 20 | 60 66 6f 6e 74 2d 6c 6f |d for a |`font-lo|
|000003c0| 63 6b 2d 64 65 66 61 75 | 6c 74 73 27 0a 70 72 6f |ck-defau|lts'.pro|
|000003d0| 70 65 72 74 79 2e 20 20 | 49 66 20 74 68 61 74 20 |perty. |If that |
|000003e0| 69 73 20 6e 6f 74 20 70 | 72 65 73 65 6e 74 2c 20 |is not p|resent, |
|000003f0| 62 75 74 20 61 20 76 61 | 72 69 61 62 6c 65 20 60 |but a va|riable `|
|00000400| 66 6f 6f 2d 6d 6f 64 65 | 2d 66 6f 6e 74 2d 6c 6f |foo-mode|-font-lo|
|00000410| 63 6b 2d 6b 65 79 77 6f | 72 64 73 27 0a 69 73 2c |ck-keywo|rds'.is,|
|00000420| 20 74 68 65 20 76 61 6c | 75 65 20 6f 66 20 74 68 | the val|ue of th|
|00000430| 61 74 20 76 61 72 69 61 | 62 6c 65 20 69 73 20 75 |at varia|ble is u|
|00000440| 73 65 64 20 61 73 20 74 | 68 65 20 64 65 66 61 75 |sed as t|he defau|
|00000450| 6c 74 20 66 6f 72 0a 60 | 66 6f 6e 74 2d 6c 6f 63 |lt for.`|font-loc|
|00000460| 6b 2d 6b 65 79 77 6f 72 | 64 73 27 2e 20 20 56 61 |k-keywor|ds'. Va|
|00000470| 72 69 6f 75 73 20 6f 74 | 68 65 72 20 62 61 63 6b |rious ot|her back|
|00000480| 77 61 72 64 2d 63 6f 6d | 70 61 74 69 62 6c 65 20 |ward-com|patible |
|00000490| 62 65 68 61 76 69 6f 72 | 73 20 61 6c 73 6f 0a 65 |behavior|s also.e|
|000004a0| 78 69 73 74 20 2d 2d 20 | 69 66 20 79 6f 75 27 72 |xist -- |if you'r|
|000004b0| 65 20 63 75 72 69 6f 75 | 73 2c 20 6c 6f 6f 6b 20 |e curiou|s, look |
|000004c0| 61 74 20 74 68 65 20 73 | 6f 75 72 63 65 2e 0a 0a |at the s|ource...|
|000004d0| 54 68 65 20 76 61 6c 75 | 65 20 6f 66 20 60 66 6f |The valu|e of `fo|
|000004e0| 6e 74 2d 6c 6f 63 6b 2d | 6d 61 78 69 6d 75 6d 2d |nt-lock-|maximum-|
|000004f0| 64 65 63 6f 72 61 74 69 | 6f 6e 27 20 69 73 20 75 |decorati|on' is u|
|00000500| 73 65 64 20 74 6f 20 64 | 65 74 65 72 6d 69 6e 65 |sed to d|etermine|
|00000510| 20 77 68 69 63 68 0a 73 | 65 74 20 6f 66 20 6b 65 | which.s|et of ke|
|00000520| 79 77 6f 72 64 73 20 61 | 70 70 6c 69 65 73 2c 20 |ywords a|pplies, |
|00000530| 69 66 20 6d 6f 72 65 20 | 74 68 61 6e 20 6f 6e 65 |if more |than one|
|00000540| 20 65 78 69 73 74 73 2e | 0a 0a 54 68 69 73 20 77 | exists.|..This w|
|00000550| 69 6c 6c 20 61 6c 73 6f | 20 70 75 74 20 74 68 65 |ill also| put the|
|00000560| 20 62 75 66 66 65 72 20 | 69 6e 74 6f 20 46 6f 6e | buffer |into Fon|
|00000570| 74 20 4c 6f 63 6b 20 6d | 6f 64 65 20 69 66 20 61 |t Lock m|ode if a|
|00000580| 6e 79 20 6b 65 79 77 6f | 72 64 73 20 65 78 69 73 |ny keywo|rds exis|
|00000590| 74 0a 61 6e 64 20 69 66 | 20 61 75 74 6f 2d 66 6f |t.and if| auto-fo|
|000005a0| 6e 74 69 66 69 63 61 74 | 69 6f 6e 20 69 73 20 63 |ntificat|ion is c|
|000005b0| 61 6c 6c 65 64 20 66 6f | 72 2c 20 61 73 20 64 65 |alled fo|r, as de|
|000005c0| 74 65 72 6d 69 6e 65 64 | 20 62 79 0a 60 66 6f 6e |termined| by.`fon|
|000005d0| 74 2d 6c 6f 63 6b 2d 61 | 75 74 6f 2d 66 6f 6e 74 |t-lock-a|uto-font|
|000005e0| 69 66 79 27 2c 20 60 66 | 6f 6e 74 2d 6c 6f 63 6b |ify', `f|ont-lock|
|000005f0| 2d 6d 6f 64 65 2d 65 6e | 61 62 6c 65 2d 6c 69 73 |-mode-en|able-lis|
|00000600| 74 27 2c 20 61 6e 64 0a | 60 66 6f 6e 74 2d 6c 6f |t', and.|`font-lo|
|00000610| 63 6b 2d 6d 6f 64 65 2d | 64 69 73 61 62 6c 65 2d |ck-mode-|disable-|
|00000620| 6c 69 73 74 27 2e 0a 0a | 43 61 6c 6c 69 6e 67 20 |list'...|Calling |
|00000630| 74 68 69 73 20 66 75 6e | 63 74 69 6f 6e 20 6d 75 |this fun|ction mu|
|00000640| 6c 74 69 70 6c 65 20 74 | 69 6d 65 73 20 69 6e 20 |ltiple t|imes in |
|00000650| 74 68 65 20 73 61 6d 65 | 20 62 75 66 66 65 72 20 |the same| buffer |
|00000660| 69 73 20 73 61 66 65 20 | 2d 2d 20 74 68 69 73 0a |is safe |-- this.|
|00000670| 66 75 6e 63 74 69 6f 6e | 20 6b 65 65 70 73 20 74 |function| keeps t|
|00000680| 72 61 63 6b 20 6f 66 20 | 77 68 65 74 68 65 72 20 |rack of |whether |
|00000690| 69 74 20 68 61 73 20 61 | 6c 72 65 61 64 79 20 62 |it has a|lready b|
|000006a0| 65 65 6e 20 63 61 6c 6c | 65 64 20 69 6e 20 74 68 |een call|ed in th|
|000006b0| 69 73 0a 62 75 66 66 65 | 72 2c 20 61 6e 64 20 64 |is.buffe|r, and d|
|000006c0| 6f 65 73 20 6e 6f 74 68 | 69 6e 67 20 69 66 20 73 |oes noth|ing if s|
|000006d0| 6f 2e 20 20 54 68 69 73 | 20 61 6c 6c 6f 77 73 20 |o. This| allows |
|000006e0| 66 6f 72 20 6d 75 6c 74 | 69 70 6c 65 20 77 61 79 |for mult|iple way|
|000006f0| 73 20 6f 66 20 67 65 74 | 74 69 6e 67 0a 46 6f 6e |s of get|ting.Fon|
|00000700| 74 20 4c 6f 63 6b 20 70 | 72 6f 70 65 72 6c 79 20 |t Lock p|roperly |
|00000710| 69 6e 69 74 69 61 6c 69 | 7a 65 64 20 69 6e 20 61 |initiali|zed in a|
|00000720| 20 62 75 66 66 65 72 2c | 20 74 6f 20 64 65 61 6c | buffer,| to deal|
|00000730| 20 77 69 74 68 20 65 78 | 69 73 74 69 6e 67 20 6d | with ex|isting m|
|00000740| 61 6a 6f 72 0a 6d 6f 64 | 65 73 20 74 68 61 74 20 |ajor.mod|es that |
|00000750| 64 6f 20 6e 6f 74 20 63 | 61 6c 6c 20 74 68 69 73 |do not c|all this|
|00000760| 20 66 75 6e 63 74 69 6f | 6e 2e 20 28 46 6f 72 20 | functio|n. (For |
|00000770| 65 78 61 6d 70 6c 65 2c | 20 46 6f 6e 74 20 4c 6f |example,| Font Lo|
|00000780| 63 6b 20 61 64 64 73 20 | 74 68 69 73 0a 66 75 6e |ck adds |this.fun|
|00000790| 63 74 69 6f 6e 20 74 6f | 20 60 66 69 6e 64 2d 66 |ction to| `find-f|
|000007a0| 69 6c 65 2d 68 6f 6f 6b | 73 27 2e 29 0a 0a 4d 61 |ile-hook|s'.)..Ma|
|000007b0| 6a 6f 72 20 6d 6f 64 65 | 73 20 74 68 61 74 20 68 |jor mode|s that h|
|000007c0| 61 76 65 20 61 6e 79 20 | 66 6f 6e 74 2d 6c 6f 63 |ave any |font-loc|
|000007d0| 6b 20 64 65 66 61 75 6c | 74 73 20 73 70 65 63 69 |k defaul|ts speci|
|000007e0| 66 69 65 64 20 73 68 6f | 75 6c 64 20 63 61 6c 6c |fied sho|uld call|
|000007f0| 20 74 68 69 73 0a 66 75 | 6e 63 74 69 6f 6e 20 64 | this.fu|nction d|
|00000800| 75 72 69 6e 67 20 74 68 | 65 69 72 20 69 6e 69 74 |uring th|eir init|
|00000810| 69 61 6c 69 7a 61 74 69 | 6f 6e 20 70 72 6f 63 65 |ializati|on proce|
|00000820| 73 73 2c 20 61 66 74 65 | 72 20 74 68 65 79 20 68 |ss, afte|r they h|
|00000830| 61 76 65 20 73 65 74 0a | 74 68 65 20 76 61 72 69 |ave set.|the vari|
|00000840| 61 62 6c 65 20 60 6d 61 | 6a 6f 72 2d 6d 6f 64 65 |able `ma|jor-mode|
|00000850| 27 2e 0a 0a 49 66 20 45 | 58 50 4c 49 43 49 54 2d |'...If E|XPLICIT-|
|00000860| 44 45 46 41 55 4c 54 53 | 20 69 73 20 74 2c 20 74 |DEFAULTS| is t, t|
|00000870| 68 69 73 20 66 75 6e 63 | 74 69 6f 6e 20 77 69 6c |his func|tion wil|
|00000880| 6c 20 6e 6f 74 20 63 68 | 65 63 6b 20 77 68 65 74 |l not ch|eck whet|
|00000890| 68 65 72 20 69 74 0a 68 | 61 73 20 61 6c 72 65 61 |her it.h|as alrea|
|000008a0| 64 79 20 62 65 65 6e 20 | 72 75 6e 20 69 6e 20 74 |dy been |run in t|
|000008b0| 68 69 73 20 62 75 66 66 | 65 72 2c 20 61 6e 64 20 |his buff|er, and |
|000008c0| 77 69 6c 6c 20 61 6c 77 | 61 79 73 20 64 6f 20 74 |will alw|ays do t|
|000008d0| 68 65 20 66 75 6c 6c 0a | 63 6f 6d 70 75 74 61 74 |he full.|computat|
|000008e0| 69 6f 6e 2e 0a 0a 49 66 | 20 45 58 50 4c 49 43 49 |ion...If| EXPLICI|
|000008f0| 54 2d 44 45 46 41 55 4c | 54 53 20 69 73 20 6e 6f |T-DEFAUL|TS is no|
|00000900| 74 20 6e 69 6c 20 61 6e | 64 20 6e 6f 74 20 74 2c |t nil an|d not t,|
|00000910| 20 69 74 20 73 68 6f 75 | 6c 64 20 62 65 20 73 6f | it shou|ld be so|
|00000920| 6d 65 74 68 69 6e 67 0a | 74 68 61 74 20 69 73 20 |mething.|that is |
|00000930| 61 6c 6c 6f 77 61 62 6c | 65 20 61 73 20 61 20 76 |allowabl|e as a v|
|00000940| 61 6c 75 65 20 66 6f 72 | 20 60 66 6f 6e 74 2d 6c |alue for| `font-l|
|00000950| 6f 63 6b 2d 64 65 66 61 | 75 6c 74 73 27 20 61 6e |ock-defa|ults' an|
|00000960| 64 20 77 69 6c 6c 20 62 | 65 0a 75 73 65 64 20 74 |d will b|e.used t|
|00000970| 6f 20 69 6e 69 74 69 61 | 6c 69 7a 65 20 74 68 65 |o initia|lize the|
|00000980| 20 46 6f 6e 74 20 4c 6f | 63 6b 20 76 61 72 69 61 | Font Lo|ck varia|
|00000990| 62 6c 65 73 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |bles...(|defalias|
|000009a0| 20 27 66 6f 6e 74 2d 6c | 6f 63 6b 2d 73 65 74 2d | 'font-l|ock-set-|
|000009b0| 64 65 66 61 75 6c 74 73 | 20 23 5b 28 26 6f 70 74 |defaults| #[(&opt|
|000009c0| 69 6f 6e 61 6c 20 65 78 | 70 6c 69 63 69 74 2d 64 |ional ex|plicit-d|
|000009d0| 65 66 61 75 6c 74 73 29 | 20 22 c0 c1 21 ad 9a 5c |efaults)| "..!..\|
|000009e0| 6e ab 86 0b 0c 73 3f aa | 83 0b 0d 73 ad 8c c6 0e |n....s?.|...s....|
|000009f0| 07 21 ad 86 0e 08 ad 82 | c9 20 87 22 20 5b 66 65 |.!......|. ." [fe|
|00000a00| 61 74 75 72 65 70 20 66 | 6f 6e 74 2d 6c 6f 63 6b |aturep f|ont-lock|
|00000a10| 20 66 6f 6e 74 2d 6c 6f | 63 6b 2d 61 75 74 6f 2d | font-lo|ck-auto-|
|00000a20| 66 6f 6e 74 69 66 79 20 | 6d 61 6a 6f 72 2d 6d 6f |fontify |major-mo|
|00000a30| 64 65 20 66 6f 6e 74 2d | 6c 6f 63 6b 2d 6d 6f 64 |de font-|lock-mod|
|00000a40| 65 2d 64 69 73 61 62 6c | 65 2d 6c 69 73 74 20 66 |e-disabl|e-list f|
|00000a50| 6f 6e 74 2d 6c 6f 63 6b | 2d 6d 6f 64 65 2d 65 6e |ont-lock|-mode-en|
|00000a60| 61 62 6c 65 2d 6c 69 73 | 74 20 66 6f 6e 74 2d 6c |able-lis|t font-l|
|00000a70| 6f 63 6b 2d 73 65 74 2d | 64 65 66 61 75 6c 74 73 |ock-set-|defaults|
|00000a80| 2d 31 20 65 78 70 6c 69 | 63 69 74 2d 64 65 66 61 |-1 expli|cit-defa|
|00000a90| 75 6c 74 73 20 66 6f 6e | 74 2d 6c 6f 63 6b 2d 6b |ults fon|t-lock-k|
|00000aa0| 65 79 77 6f 72 64 73 20 | 74 75 72 6e 2d 6f 6e 2d |eywords |turn-on-|
|00000ab0| 66 6f 6e 74 2d 6c 6f 63 | 6b 5d 20 32 20 28 23 24 |font-loc|k] 2 (#$|
|00000ac0| 20 2e 20 36 31 34 29 5d | 29 0a 28 70 72 6f 76 69 | . 614)]|).(provi|
|00000ad0| 64 65 20 27 66 6f 6e 74 | 6c 2d 68 6f 6f 6b 73 29 |de 'font|l-hooks)|
|00000ae0| 0a | |. | |
+--------+-------------------------+-------------------------+--------+--------+
